home *** CD-ROM | disk | FTP | other *** search
/ Star Festival... a Return to Japan / Star Festival... a Return to Japan.iso / pc / STARFESTIVAL / 19r.dir / 00001.ls next >
Encoding:
Text File  |  1999-04-02  |  2.1 KB  |  80 lines
  1. on startMovie
  2.   global gCursorReady, gKnobState, gMagCursor, gsearchOn, qtChan, gKnobSprite, gSendMovie, gCurrentLocation, GSFpathname
  3.   puppetSprite(44, 1)
  4.   gCursorReady = 1
  5.   gMagCursor = "magCursor"
  6.   gCurrentLocation = 19
  7.   puppetSprite(48, 1)
  8.   puppetSound(0)
  9.   GSFpathname = the pathName
  10.   gSendMovie = "19r"
  11.   qtChan = 35
  12.   sprite(qtChan).volume = 256
  13.   cast("shrmem").directToStage = 1
  14.   preLoad(qtChan - 1)
  15.   initGlobals()
  16.   gKnobSprite = 17
  17.   setUpKnob()
  18.   if gsearchOn = 1 then
  19.     sprite(6).visible = 1
  20.   else
  21.     sprite(6).visible = 0
  22.   end if
  23.   set the mouseDownScript to EMPTY
  24.   set the mouseUpScript to EMPTY
  25. end
  26.  
  27. on idle
  28.   global gCursorReady
  29.   if gCursorReady = 1 then
  30.     cursor(200)
  31.     checkCursors()
  32.     set the locH of sprite 44 to the mouseH
  33.     set the locV of sprite 44 to the mouseV
  34.     updateStage()
  35.     if sprite(36).movieRate = 0 then
  36.       sprite(36).movieRate = 1
  37.     end if
  38.   end if
  39. end
  40.  
  41. on checkCursors
  42.   global gMagCursor
  43.   set the castNum of sprite 44 to the number of member "curs1"
  44.   if rollOver(5) then
  45.     set the castNum of sprite 44 to the number of member "hotCursor"
  46.   end if
  47.   if rollOver(22) then
  48.     set the castNum of sprite 44 to the number of member "hotCursor"
  49.   end if
  50.   if rollOver(23) then
  51.     set the castNum of sprite 44 to the number of member "hotCursor"
  52.   end if
  53.   repeat with i = 8 to 12
  54.     if rollOver(i) then
  55.       set the castNum of sprite 44 to the number of member "hotCursor"
  56.     end if
  57.   end repeat
  58.   repeat with i = 14 to 21
  59.     if rollOver(i) then
  60.       set the castNum of sprite 44 to the number of member "hotCursor"
  61.     end if
  62.   end repeat
  63.   repeat with i = 24 to 28
  64.     if rollOver(i) then
  65.       set the castNum of sprite 44 to the number of member "hotCursor"
  66.     end if
  67.   end repeat
  68.   if rollOver(39) then
  69.     set the castNum of sprite 44 to the number of member "hotCursor"
  70.   end if
  71.   if rollOver(37) then
  72.     set the castNum of sprite 44 to the number of member "nonCursor"
  73.   end if
  74.   repeat with i = 40 to 42
  75.     if rollOver(i) then
  76.       set the castNum of sprite 44 to the number of member "hotCursor"
  77.     end if
  78.   end repeat
  79. end
  80.